<!--#include file="Librerias/mssql-ds.dll" -->
<%
seleccion = request.QueryString("select")
opcion = request.QueryString("opcion")

	ComboConstruido = "<select name=""linea"" id=""linea"" class=""TextoTam7"" onChange=""cargaPerspectiva(this.id)""><option value="""">-- Seleccione --</option>"
	sSQL = ""
	sSQL = sSQL & " SELECT pers_id, pers_descripcion"
	sSQL = sSQL & " FROM Perspectivas"
	sSQL = sSQL & " WHERE (pers_jerarquia = 2) AND (pers_depende = "& opcion &") AND (pers_estado = 1)" 
	MatrizCombo = MatrixBD(sSQL, 1)
	QReg = UBound(MatrizCombo, 2)
		For i = 0 To QReg
			ComboConstruido = ComboConstruido & "<option value='" & MatrizCombo(0, i) & "'"
			ComboConstruido = ComboConstruido & ">"& MatrizCombo(1, i) &"</option>"
		Next				
	ComboConstruido = ComboConstruido & "</select>"
	response.ContentType = "text/html; charset=iso-8859-1"
	response.write ComboConstruido
%>